home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CU Amiga Super CD-ROM 6
/
CU Amiga Magazine's Super CD-ROM 06 (1996)(EMAP Images)(GB)(Track 1 of 4)[!][issue 1997-01].iso
/
cucd
/
prog
/
mui
/
locale
/
install
< prev
next >
Wrap
Text File
|
1996-10-18
|
12KB
|
306 lines
;
;----------------------------------------------------------------------------
;
; mui36loc - Installer script by Marcin Orlowski <carlos@dedal.man.szczecin.pl>
;
;----------------------------------------------------------------------------
;
; $VER: Installer script v3.6.5 for mui36loc (18.10.96) © Marcin Orlowski
;
;
; History
; --------------------
;
; - Tue Sep 24 12:24:00 1996 - Initial release
; - Thu Sep 26 10:14:20 1996 - Fixed bug setting Svenska for Suomi
; and nothing for Svenska
; - Wed Oct 9 12:24:42 1996 - Català translations added
; Español translation of installer script
; - Mon Oct 14 18:53:01 1996 - Smarter MUI version checking
; - Nederlands translation of installer
; - French was hard to install...
; - Catalan too...
; - Removed some unwanted (N/A)'s
; - Fri Oct 18 18:08:07 1996 - Italian translations added
;
;----------------------------------------------------------------------------
;
; C I
(set #def_lang_English 0) ; * *
(set #def_lang_Català 1) ; * *
(set #def_lang_Czech 2) ; * -
(set #def_lang_Dansk 4) ; * *
(set #def_lang_Español 8) ; * *
(set #def_lang_Français 16) ; * *
(set #def_lang_Greek 32) ; * *
(set #def_lang_Italiano 64) ; * *
(set #def_lang_Nederlands 128) ; * *
(set #def_lang_Norsk 256) ; * *
(set #def_lang_Polski 512) ; * *
(set #def_lang_Português 1024) ; * *
(set #def_lang_Suomi 2048) ; * *
(set #def_lang_Svenska 4096) ; * -
;----------------------------------------------------------------------------
;/// Strings
;/// ***** English
(set #def_lang #def_lang_English)
(set #welcome (cat "\nWelcome to localization set for MUI 3.5-3.6\n\n"
"This package has been created for SASG\n"
"by Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Note: these localizations work with MUI 3.6 only."))
(set #wrongMUI "You need MUI 3.6 to use this package\n")
(set #lang "Select language you want to use with MUI")
;//|
;/// ***** Català
(if (= @language "català")
(
(set #def_lang #def_lang_Català)
(set #welcome (cat "\nBenvingut al paquet de locals pel MUI 3.6\n\n"
"Aquest paquet ha estat creat per SASG\n"
"per Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Nota: Aquest locals només funcionen amb el MUI 3.6!"))
(set #wrongMUI "Necesites el MUI 3.6 per utilitzar aquest paquet\n")
(set #lang "Tria l'idioma que vols fer servir amb el MUI")
)
)
;//|
;/// ***** Czech (NO STRINGS)
(if (= @language "czech")
(
(set #def_lang #def_lang_Czech)
)
)
;//|
;/// ***** Dansk
(if (= @language "dansk")
(
(set #def_lang #def_lang_dansk)
(set #welcome (cat "\nVelkommen til lokaliserings-sættet for MUI 3.6\n\n"
"Denne pakke er skabt for SASG\n"
"af Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Bemærk: Disse lokaliseringer virker kun med MUI 3.6!"))
(set #wrongMUI "Du skal have MUI 3.6 for at bruge denne pakke.\n")
(set #lang "Vælg det sprog du ønsker at bruge med MUI")
)
)
;//|
;/// ***** Español
(if (= @language "español")
(
(set #def_lang #def_lang_Español)
(set #welcome (cat "\nBienvenido a el paquete de locales para el MUI 3.6\n\n"
"Este paquete ha sido creado para SASG\n"
"por Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Nota: Estos locales solo funcionan con el MUI 3.6!"))
(set #wrongMUI "Necesitas el MUI 3.6 para usar este paquete\n")
(set #lang "Escoge el lenguaje que quieres usar con el MUI")
)
)
;//|
;/// ***** Français
(if (= @language "français")
(
(set #def_lang #def_lang_français)
(set #welcome (cat "\nBienvenue dans le système de localisation pour MUI 3.6\n\n"
"Ce système a été pour le SASG\n"
"par l'Organisation des Traducteurs Amiga\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Note : Ces localisations ne fonctionnent qu'avec MUI 3.6 !"))
(set #wrongMUI "MUI 3.6 est nécessaire pour utiliser ce système\n")
(set #lang "Choisir la langue à utiliser avec MUI")
)
)
;//|
;/// ***** Greek
(if (= @language "greek")
(
(set #def_lang #def_lang_greek)
(set #welcome (cat "\nÊáëþò Þëèáôå, óôï ðñüãñáììá Åëëçíïðïßçóçò ãéá ôï MUI 3.6\n\n"
"Ôï ðáêÝôï áõôü, åôïéìÜóôçêå ãéá ôçí SASG\n"
"áðü ôïí Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Óçìåßùóç: Ôï localization áõôü ëåéôïõñãåß ìüíï ìå ôï MUI"))
(set #wrongMUI "Áõôü ôï ðáêÝôï, áðáéôåß ãéá ôçí ÷ñÞóç ôïõ, ôï MUI 3.6\n")
(set #lang "EðéëÝîôå ôçí ãëþóóá, ðïõ èÝëåôå íá ÷ñçóéìïðïéÞóåôå óôï MUI")
)
)
;//|
;/// ***** Italiano
(if (= @language "italiano")
(
(set #def_lang #def_lang_italiano)
(set #welcome (cat "\nBenvenuto al pacchetto di localizzazione di MUI 3.6\n"
"Questo pacchetto è stato creato per SASG\n"
"da Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Attenzione: questa localizzazione è valida solo per MUI 3.6!"))
(set #wrongMUI "Questo pacchetto può essere usato solo con MUI 3.6\n")
(set #lang "Scegli il linguaggio in cui vuoi usare MUI")
)
)
;//|
;/// ***** Nederlands
(if (= @language "nederlands")
(
(set #def_lang #def_lang_nederlands)
(set #welcome (cat "\nWelkom bij het vertalingspakket voor MUI 3.6\n\n"
"Dit pakket is gemaakt voor SASG door de\n"
"Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Nederlandse afdeling:\n"
"(http://www.stack.urc.tue.nl/~leon/ATO/)\n\n\n"
"Opm.: Deze vertalingen werken alleen met MUI 3.6!"))
(set #wrongMUI "U heeft MUI 3.6 nodig om dit pakket te gebruiken\n")
(set #lang "Kies de taal die u in MUI wilt gebruiken")
)
)
;//|
;/// ***** Norsk
(if (= @language "norsk")
(
(set #def_lang #def_lang_norsk)
(set #welcome (cat "\nVelkommen til lokalisering av MUI 3.6\n\n"
"Denne pakken er laget for SASG\n"
"av Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Viktig: Disse oversettingene virker bare med MUI 3.6!"))
(set #wrongMUI "Du trenger MUI 3.6 for å bruke denne pakken\n")
(set #lang "Velg språket du vil bruke i MUI")
)
)
;//|
;/// ***** Polski
(if (= @language "polski")
(
(set #def_lang #def_lang_polski)
(set #welcome (cat "\nWitaj w pakiecie lokalizacyjnym dla MUI 3.6\n\n"
"Pakiet ten zostaî stworzony dla SASG Intl.\n"
"przez Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Uwaga: znajdujâce sië w tym pakiecie tîumaczenia\n"
"sâ zgodne wyîâcznie z MUI 3.6!"))
(set #wrongMUI "Musisz mieê MUI w wersji 3.6 aby uûyê tego pakietu\n")
(set #lang "Wybierz jëzyk jakiego chcesz uûywaê z MUI")
)
)
;//|
;/// ***** Português
(if (= @language "português")
(
(set #def_lang #def_lang_português)
(set #welcome (cat "\nBenvindo á configuração da linguagem para o MUI 3.6\n\n"
"Este pacote foi criado para a SASG\n"
"por Amiga Translators' Organization\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Nota: Estas configurações só funcionam com o MUI3.6!"))
(set #wrongMUI "Necessita do MUI 3.6 para usar este programa\n")
(set #lang "Seleccione a linguagem que quer usar com o MUI")
)
)
;//|
;/// ***** Suomi
(if (= @language "suomi")
(
(set #def_lang #def_lang_suomi)
(set #welcome (cat "\nTervetuloa asentamaan MUI 3.6:n käännöstä.\n\n"
"Tämän kokoelman on SASG:lle tehnyt\n"
"Amiga Translators' Organization.\n\n"
"(http://www2.dk-online.dk/users/Ole_Friis/Trans/)\n\n"
"Huomio: nämä paikallisteet toimivat vain MUI:n versiossa 3.6!"))
(set #wrongMUI "Tarvitset MUI 3.6:n käyttääksesi tätä kokoelmaa.\n")
(set #lang "Valitse kieli, jota haluat käyttää MUI:ssa.")
)
)
;//|
;/// ***** Svenska (NO STRINGS)
(if (= @language "svenska")
(
(set #def_lang #def_lang_svenska)
)
)
;//|
;//|
;/// Checking environment
;----------------------------------------------------------------------------
(complete 0)
(message #welcome)
(if (= 0 (exists "MUI:" (noreq))) (abort #wrongMUI))
(set MUI_ver (getversion "MUI:Libs/muimaster.library"))
(if (AND (AND (< MUI_ver (* 16 65536)) (>= MUI_ver (* 18 65536))) (<> MUI_ver 0)) (abort #wrongMUI))
;//|
;/// Make a choice...
;----------------------------------------------------------------------------
(set Catalog_lang
(askoptions
(prompt #lang)
(help @askoptions-help)
(choices "Català"
"Czech"
"Dansk"
"Español"
"Français"
"Greek"
"Italiano"
"Nederlands"
"Norsk"
"Polski"
"Português"
"Suomi"
"Svenska"
)
(default #def_lang)
)
)
;//|
;/// Here we go...
;-------------------------- here we go... -----------------------------------
(set Cat_Dir "MUI:Locale/Catalogs")
(if (> Catalog_lang 0)
(
(if (not (exists Cat_dir)) (makedir Cat_dir))
(if (bitand Catalog_lang #def_lang_Català ) ((set lang "català") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Czech ) ((set lang "czech") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Dansk ) ((set lang "dansk") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Español ) ((set lang "español") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Français ) ((set lang "français") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Greek ) ((set lang "greek") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
; (if (bitand Catalog_lang #def_lang_Italiano ) ((set lang "italiano") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Nederlands) ((set lang "nederlands") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Norsk ) ((set lang "norsk") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Polski ) ((set lang "polski") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Português ) ((set lang "português") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Suomi ) ((set lang "suomi") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
(if (bitand Catalog_lang #def_lang_Svenska ) ((set lang "svenska") (copyfiles (source (tackon "Catalogs" lang)) (all) (dest (tackon Cat_dir lang)))))
)
)
;-------------------------- ... and we gone. -------------------------------
(complete 100)
;********************
(exit (QUIET))
;//|